object FormClone: TFormClone Left = 702 Top = 88 BorderStyle = bsDialog Caption = 'Copier depuis un autre contact' ClientHeight = 334 ClientWidth = 253 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object SC_Line5: TSC_Line Left = 0 Top = 300 Width = 253 Height = 34 BorderShape = bsTopLine Align = alBottom end object Label1: TLabel Left = 12 Top = 15 Width = 38 Height = 14 Caption = 'Trouver' Transparent = True end object Button1: TButton Left = 50 Top = 307 Width = 75 Height = 22 Caption = '&Ok' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 2 end object Button2: TButton Left = 136 Top = 307 Width = 75 Height = 22 Cancel = True Caption = '&Annuler' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ModalResult = 2 ParentFont = False TabOrder = 3 end object ListViewClone: TListView Left = 12 Top = 41 Width = 226 Height = 245 Cursor = crHandPoint Columns = < item Caption = 'Nom' Width = 115 end item Caption = 'Pr'#233'nom' Width = 89 end> ColumnClick = False HideSelection = False ReadOnly = True RowSelect = True SmallImages = MainFormMira.ImageList1 TabOrder = 1 ViewStyle = vsReport OnDblClick = ListViewCloneDblClick end object EditFete: TEdit Left = 57 Top = 12 Width = 181 Height = 22 TabOrder = 0 OnChange = EditFeteChange end end